﻿Imports Q7P1TTS.Lib

Public Class ServiceDetail
    Dim srv As New Service()
    Public Sub New(ByVal ID As Integer)
        InitializeComponent()
        srv = ServiceController.load(ID)
    End Sub
    Private Sub ServiceDetail_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        lblTitle.Text = srv.Title
        lblDate.Text = ConvertHelper.ToDateTime(srv.CreateDate).ToLongDateString()
        lblDesc.Text = srv.Description
    End Sub
End Class
